home *** CD-ROM | disk | FTP | other *** search
/ Mega Game 2000 #3 / Mega Game № 03 2000.iso / Data / Mainmenu.dxr / Script_9_main_ctrl.ls < prev    next >
Encoding:
Text File  |  2000-02-15  |  2.7 KB  |  114 lines
  1. global stateSound, nameSoundFon
  2.  
  3. on mouseEnter
  4.   tmpMember = the currentSpriteNum
  5.   case tmpMember of
  6.     70:
  7.       cursor([member("cur_3"), member("cur_3_m")])
  8.       tmpCastName = "anm_ret"
  9.       tmpHint = "h_ret"
  10.     71:
  11.       cursor([member("cur_3"), member("cur_3_m")])
  12.       tmpCastName = "anm_exit"
  13.       tmpHint = "h_exit"
  14.     72:
  15.       cursor([member("cur_3"), member("cur_3_m")])
  16.       if stateSound = 1 then
  17.         tmpCastName = "anm_sound_on"
  18.         tmpHint = "h_sound_dn"
  19.       else
  20.         tmpCastName = "anm_sound_off"
  21.         tmpHint = "h_sound_up"
  22.       end if
  23.   end case
  24.   set the member of sprite (tmpMember - 3) to tmpCastName
  25.   set the member of sprite 110 to tmpHint
  26. end
  27.  
  28. on mouseLeave
  29.   tmpMember = the currentSpriteNum
  30.   tmpCastName = "h_null"
  31.   tmpHint = "h_null"
  32.   case tmpMember of
  33.     70:
  34.       cursor(0)
  35.       tmpCastName = "ret"
  36.     71:
  37.       cursor(0)
  38.       tmpCastName = "exit"
  39.     72:
  40.       cursor(0)
  41.       if stateSound = 1 then
  42.         tmpCastName = "sound_on"
  43.       else
  44.         tmpCastName = "sound_off"
  45.       end if
  46.   end case
  47.   set the member of sprite (tmpMember - 3) to tmpCastName
  48.   set the member of sprite 110 to tmpHint
  49. end
  50.  
  51. on mouseDown
  52.   tmpMember = the currentSpriteNum
  53.   tmpCastName = "h_null"
  54.   tmpHint = "h_null"
  55.   case tmpMember of
  56.     70:
  57.       tmpCastName = "ret_a"
  58.       set the member of sprite (tmpMember - 3) to tmpCastName
  59.       set the member of sprite 110 to tmpHint
  60.       cursor(0)
  61.       updateStage()
  62.       if stateSound = 1 then
  63.         puppetSound(1, 0)
  64.         puppetSound(1, "snd_Back")
  65.         updateStage()
  66.       end if
  67.       if stateSound = 1 then
  68.         go(1, "Mainmenu")
  69.       else
  70.         go(2, "Mainmenu")
  71.       end if
  72.     71:
  73.       tmpCastName = "exit_a"
  74.       set the member of sprite (tmpMember - 3) to tmpCastName
  75.       set the member of sprite 110 to tmpHint
  76.       cursor(0)
  77.       updateStage()
  78.       if stateSound = 1 then
  79.         puppetSound(1, 0)
  80.         puppetSound(1, "snd_Exit")
  81.         updateStage()
  82.       end if
  83.       sprite(69).visible = 0
  84.       go(label("Exit"))
  85.     72:
  86.       if stateSound = 1 then
  87.         puppetSound(1, 0)
  88.         puppetSound(1, "snd_Click1")
  89.         updateStage()
  90.         stateSound = 0
  91.       else
  92.         puppetSound(2, 0)
  93.         puppetSound(2, "snd_Click1")
  94.         puppetSound(1, 0)
  95.         puppetSound(1, nameSoundFon)
  96.         updateStage()
  97.         stateSound = 1
  98.       end if
  99.       if stateSound = 1 then
  100.         tmpCastName = "anm_sound_on"
  101.         tmpHint = "h_sound_dn"
  102.       else
  103.         tmpCastName = "anm_sound_off"
  104.         tmpHint = "h_sound_up"
  105.       end if
  106.       set the member of sprite (tmpMember - 3) to tmpCastName
  107.       set the member of sprite 110 to tmpHint
  108.       updateStage()
  109.   end case
  110. end
  111.  
  112. on mouseUp
  113. end
  114.